home *** CD-ROM | disk | FTP | other *** search
/ Stairway to Heaven / Stairway to Heaven.iso / tengoku / cdrom23.dir / 00041_Script_41 < prev    next >
Text File  |  1995-02-20  |  348b  |  14 lines

  1. on enterFrame str
  2.  put "saori" into str 
  3.   put FileIO(mNew,"?write","data2.tex") into myObj
  4.   if objectp(myObj) then
  5.     myObj(mWriteString,str)
  6.     myObj(mDispose)
  7.    -- return TRUE
  8.     go to frame 100
  9.   else if myObj <> -43 then
  10.     alert " can't file create :" & FileIO(mError,myObj)
  11.   end if 
  12.  -- return FALSE
  13.   go to frame 100
  14. end